(mail-unsent-separator): Additional alternative.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 6e4dac78ce99c591ff5f58b5411024a0e0ebad9e..419f0e21a1f3b5daa071bdfd1ff2b02913bff120 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -2969,7 +2969,8 @@ typically for purposes of moderating a list."
          "^ *--+ +begin message +--+ *$\\|"
          "^ *---+ +Original message follows +---+ *$\\|"
          "^ *---+ +Your message follows +---+ *$\\|"
-         "^|? *---+ +Message text follows: +---+ *|?$")
+         "^|? *---+ +Message text follows: +---+ *|?$"
+         "^ *---+ +This is a copy of the message, including all the headers.*---+ *$")
   "A regexp that matches the separator before the text of a failed message.")
 
 (defvar mail-mime-unsent-header "^Content-Type: message/rfc822 *$"